Creating
a gambas2
program,
step by step, a telephone index
From : http://listingambas.blogspot.com/2011/06/modulo-gestion-borrar-datos-antes-de.html
From : http://listingambas.blogspot.com/2011/06/modulo-gestion-borrar-datos-antes-de.html
Management Module: Delete data before clicking Valid
Well,
if that happens while we are entering the data, we erase all what we
have introduced.
There would be two solutions
There would be two solutions
-
Clear manually all of the textboxes
-
Use the following code by clicking on the button "Clear"
PUBLIC
SUB Button Clear_Click ()
PictureBoxphoto.Picture = Picture["icon:/96/gambas"]
TextBoxDNI.text = ""
TextBoxname.text = ""
TextBoxsurname.text = ""
TextBoxcompany.text = ""
TextBoxJob.text = ""
TextBoxJobTel.text = ""
TextBoxPrivateTel.text = ""
TextBoxFax.text = ""
TextBoxJobMobile.text = ""
TextBoxPrivateMobile.text = ""
TextBoxWEB.text = ""
PictureBoxPhoto.Picture = ""
TextBoxAddress.text = ""
TextBoxComments.text = ""
TextBoxDate.text = ""
TextBoxMail.text = ""
PictureBoxphoto.Picture = Picture["icon:/96/gambas"]
TextBoxDNI.text = ""
TextBoxname.text = ""
TextBoxsurname.text = ""
TextBoxcompany.text = ""
TextBoxJob.text = ""
TextBoxJobTel.text = ""
TextBoxPrivateTel.text = ""
TextBoxFax.text = ""
TextBoxJobMobile.text = ""
TextBoxPrivateMobile.text = ""
TextBoxWEB.text = ""
PictureBoxPhoto.Picture = ""
TextBoxAddress.text = ""
TextBoxComments.text = ""
TextBoxDate.text = ""
TextBoxMail.text = ""
END
